home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / Bonus / VCLZip / kp222_b4.exe / kpSFXOpt.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  2001-07-23  |  1.7 KB  |  57 lines

  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1999 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'kpSFXOpt.pas' rev: 4.00
  6.  
  7. #ifndef kpSFXOptHPP
  8. #define kpSFXOptHPP
  9.  
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #include <SysInit.hpp>    // Pascal unit
  13. #include <System.hpp>    // Pascal unit
  14.  
  15. //-- user supplied -----------------------------------------------------------
  16.  
  17. namespace Kpsfxopt
  18. {
  19. //-- type declarations -------------------------------------------------------
  20. #pragma option push -b-
  21. enum TsfxOverwriteMode { omPrompt, omAlways, omNever };
  22. #pragma option pop
  23.  
  24. #pragma pack(push, 1)
  25. struct sfxSpecialHeader
  26. {
  27.     char Sig[3];
  28.     Byte OptionsByte;
  29.     Byte CaptionLen;
  30.     Byte ExtractPathLen;
  31.     Byte CmdLineLen;
  32.     char StringData[249];
  33. } ;
  34. #pragma pack(pop)
  35.  
  36. //-- var, const, procedure ---------------------------------------------------
  37. #define SFXSig "MPU"
  38. extern PACKAGE sfxSpecialHeader MPUHeader;
  39. extern PACKAGE char *OptionsPointer;
  40. extern PACKAGE int OptionsSize;
  41. extern PACKAGE void __fastcall setUserCanDisableCmdLine(bool Value);
  42. extern PACKAGE void __fastcall setUserCanChooseFiles(bool Value);
  43. extern PACKAGE void __fastcall setUserCanChangeOverwrite(bool Value);
  44. extern PACKAGE void __fastcall setOverwriteMode(TsfxOverwriteMode om);
  45. extern PACKAGE void __fastcall setStringData(AnsiString sfxCaption, AnsiString sfxDefPath, AnsiString 
  46.     sfxCmdLine);
  47.  
  48. }    /* namespace Kpsfxopt */
  49. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  50. using namespace Kpsfxopt;
  51. #endif
  52. #pragma option pop    // -w-
  53.  
  54. #pragma delphiheader end.
  55. //-- end unit ----------------------------------------------------------------
  56. #endif    // kpSFXOpt
  57.